8 
ےا . « / f=.‏ ذء RTO >١١‏ أ »> » 
أعداد وتصميم /جرزروب مريق أصدفاءع الكمديومر أ لمنتخصص م / ډ || سم a‏ 
0 ا . | + مفو +١‏ ب ا e e‏ 4 هه * 


"Êê rx! 


السيرة الذاتية للمعلم 


الإدارة التعليمية التابع لها : ا E O‏ 
المؤهل الدراسى : e‏ 
المدرسة الأساسية: تجن ساس اوج م و ا و RR O‏ 
المدرسة المنتدب اليها : ا ا ا E‏ 


O O OE ERE ORR SR ROARS : تاريخ التعيين‎ 


الوظيفة على الكادر: N oo‏ 


كود المعلم: 0002001 


رقم الهاتف : 00 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


aaa 

]1 ا1ل ]لا 
تتت 
7 ]| ] ] ]1 ] ]1لا 
ا ا ا ااا 


mamma 
لتلللتلللل لالا‎ 
LETTE 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوترالمتخصص -أ/ ياسمبن شعيب 


توزيع محتوى مادة الكمبيوتر وتكنولوجيا المعلومات 
والاتصالات للصف الأول الثانوي العام الدراسي 


“5/101 الفصل الدراسي الثائى (نظري وعملي) 
الا ET‏ 


الموضوع المصاحة 


- تدريب قراءة بيانات ورقة إكسيل باستخدام الفيجوال بيزيك دوت نت 
والتعرف علي النتغيرات المستخدمة في المشروع والتعرف علي التصنيفات 
المستخدمة في كود البرمجة. 

- تدريب قراءة بيانات ورقة إكسيل باستخدام الفيجوال بيزيك دوت نت 
وتخصيص القيم المستخدمة للمتغيرات واستخدام الكود اللازم لملء أدوات 
التحكم بالبيانات. 

- استكمال تدريب قراءة بيانات ورقة إكسيل باستخدام الفيجوال بيزيك دوت 
نت 

- إنشاء الدالة الخاصة بقراءة بيانات ورقة إكسيل 

- كتابة الكود اللازم لملء الأداة ه0070 بأسماء القارات. 

- حل أسئلة وتدريبات علي الموضوع الثامن. 

الموضوع التاسع: :كتابة كود المشروع 

- كتابة الكود اللازم لملع الأداة ×ط٥‏ ط ١٥ء‏ بأسماء الدول. 

- كتابة الكود اللازم لعرض بيانات الدولة بإستخدام الأداة ا206ا. 

- حل أسئلة وتدريبات علي الموضوع التاسع 

الموضوع العاشر: إضافة خريطة وعلم الدولة لبرنامج الأطلس العربي 
الإلكتروني: 

- كتابة الكود اللازم لعرض علم الدولة وخريطتخا بإاستخدام أداة 
.picturebox‏ 

- حل أسئلة وتدريبات علي الموضوع العاشر 

الموضوع الحادي عشر: إضافة صوت السلام الوطني لبرنامج الأطلس العربي 
الإلكتروني: 

- كتابة الكود اللازم لتشغيل ملف صوت السلام الوطني للدولة. 

- كتابة الكود اللازم لتشغيل أو إيقاف ملف صوت السلام الوطني للدولة. 

- حل أسئلة وتدريبات علي الموضوع الحادي عشر 

الموضوع الثاني عشر: :إضافة فيديو المعالم السياحية لبرنامج الأطلىس العربي 
الإلكتروني: 

- كتابة الكود اللازم لتشغيل ملف الفيديو للمعالم السياحية للدولة 


حل أسئلة وتدريبات علي الموضوع الثاني عشر. 


الأجزاءا 


لعملية الخا 


صة بكل درس 


الأجزاءا 


لعملية الخا 


صة بكل درس 


مراجعة عامة وحل أسئلة علي الفصل الدراسي الثاني. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


الأهداف العامة لمادة الكمبيوتر وتكنولوجيا المعلومات والاتصالات 
فى نهاية الفصل الدراسى الأولينبغى ان يكون الطالب قادرا على: 
.كه يستخدام خطوات أسلوب حل المشكلات في إنشاء الأطلس العربي الإلكتروني. 
كع كع يتعامل مع الإنترنت من خلال نظام التشغيل. 
ك ينشىء قاعدة بيانات باستخدام أحد برامج الجداول الإلكترونية. 
كك يصميم وإنشاء واجهة برمجية باستخدام أحد لغات البرمجة. 
ك كع يستعراض البيانات من خلال البرمجية باستخدام أحد لغات البرمجة. 
كه كه يوظيف الوسائط المتعددة داخل البرمجية. 
كع كع يتعامل مع الصورمن خلال بعض برامج تحرير ومعالجة الصور. 
كع كع يصمم الصورالثابتة والمتحركة. 
كع كع ينشىء ويعالج ملفات الصوت من خلال بعض برامج تحرير ومعالجة الصوت. 
كع كع ينشىع ويعالج ملفات الفيديو من خلال بعض برامج تحرير ومعالجة الفيديو. 
كع كع ينشىع قناة اتصال بين قواعد البيانات والبرمجية. 
كع كع يهيئ و يستدعى ملفات الصور و الصوت والفيديو داخل البرمجية. 
كع كع استخدم إحدى جمل لغة 501 (5©16©1) 


كع كع يوظف ملفات الصور والصوت والفيديو داخل البرمجية 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


الأهداف الخاصة لمادة الكمبيوتر وتكنولوجيا المعلومات والاتصالات 


فى نهاية الفصل الدراسى الأولينبغى ان يكون الطالب قادرا على: 
كع كع يذ كر المقصود بالمصطلحات: 
ActiveX Data Object - ADO -‏ 
Class -‏ 
Object -‏ 
Namespace -‏ 
Framework -‏ 
Structured Query Language) SQL -‏ 
ك ك يكتب الكود الخاص بفتح قناة اتصال. 
كع ك يُعلن عن المتغيرات اللازمة لفتح قناة اتصال. 
كع كع يكتب الكود الخاص باستدعاع ملف إكسيل إلى الذاكرة. 
ك يخصص بيانات الأعمدة في جدول البيانات بالذاكرة لما تناظرها في أدوات 
التحكم في نافذة واجهة المستخدم 
کے كع يكتب الكود الخاص باستدعاع بيانات من جدول إكسيل وعرضها عن طريق 
أدوات التحكم المناظرة لها في نافذة واجهة المستخدم. 
كع كع يمنع حدوث الأخطاء المحتملة أثناء التشغيل. 
كع كع يكتب الكود الخاص بعرض خرائط وأعلام الدول عن طريق أدوات التحكم 
المناظرة لها في نافذة واجهة المستخدم. 
كع كع يمنع حدوث الأخطاء المحتملة أثناء التشغيل. 
كع كع إظهار أنواع ملفات الصور في المجلد. 
كع كع يحدد مسار حفظ ملفات الصور. 
كع كع يكتب الكود الخاص بتشغيل أو إيقاف ملف صوت عند الضغط على زر أمر. 
كهر كع يحدد مكان الإعلان عن المتغيرات على مستوى التصنيف أو الإجراع. 
كع كع إظهار أنواع ملفات الصوت فى المجلد. 
کم يحدد مسار حفظ ملفات الصوت. 
كع مع يكتب الكود الخاص بتشغيل أو إيقاف ملف فيديو. 
كع كع يحدد مسار حفظ ملفات الفيديو. 
كع كع إظهار أنواع ملفات الفيديو في المجلد 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


الدرس الأول 
قراءة بيانات ورقة إكسيل باستخدام 8.١161‏ /ا 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: العصف الذهني - الحواروالمناقشة - التفكي 
یذکرالمقصود بالمصطلحات 61355 - ۸50 الناقد 


يكت الكودالخاص بغتع قنتاتصال 5515515-55 


يُعلن عن المتغيرات اللازمة لفتح قناة اتصال السبورة الإلكترونية - الكتاب المدرسي - عرض 


تعديمي 


التدمهي م / أثناء كتابة الكود (البرمجة) في Studio.N E1.‏ 1دنا5الاسيتم استخدام بعض المصطلحات والمفاهيم 
الأساسية التي سبق لك دراستها في العام السابق وأيضاتسيتم التعرف على بعض المصطلحات الجديدة في هذا الكتاب كالاني : 


عرضالدرس 


ActiveX Data Object - ADO © 

هوتقنية متقدمة يمكن استخدامها لجعل أدوات التحكم( 201105 ) ليست مجرد أدوات عادية ولكن يمكن جعلها 
تتعامل مع قواعد بيانات من خلال برمجيات مناسبة وعمل مشاريع وتطبيقات تتعامل مع قواعد البيانات المتعددة 
Applications Web Application)‏ 0001/5 ثلالا) حيث 800.811 عبارة عن مجموعة من التصنيفات أو الفئات 
05 التي تتعامل مع مصادر البیانات مثل 012616966655 و.561/1 501وكل هذه البرمجيات تستطيع بناء قواعد 
البيانات والتعامل معها. ويعتبر ۸20.٤۲‏ جزء من إطار العملrk .۴ra mew‏ 

:Class® 

هو المخطط 0111 5/16 الذي يتم إنشاء الكائنات منه ويحدد به العديد من العناصر مثل الخصائص65 6111م 6:0 والوظائف أو 
الوسائل Methods‏ والأحداث Events‏ والتي ي يأخذها أي كائن]عء ز0يتم إنشاؤه من التصنيف 1255© 

:Object © 

يتميز الكائن بأن له: 

1-خصائص ٥۲٥5‏ م٥۴۲‏ تصف الكائن وتحدده. 

2 -ÎحEventsûla‏ يمكن أن تقع عليه. 

3 -وظائف أو وسائل1/16]17005 ويقصد بها ما يمكن أن د يفعله الكائن عند وقوع 

حدث معين 

والكائن هود وحدة ة البناع الأساسية في لغات البرمجة كائنية ثنية التوجداءء زط 0 rien‏ 0 ویتم انشاؤه من تصنيف معين 

5 حيث ان اي کائن ٥۲‏ زط0 ليس له وجود إلا بعد إنشائه من تصنيف معين1255© 

:Namespace® 

يحتوى على مجموعة من التصنيفات مها التي يمكن استخدامها عند الاحتياج إليها . 

1 :Framework © 

هوإطارالعمل لجميع تطبيقات511010.5181 21ناذ5 ألا الذى يُمكنك من الآتی: 

1 -إنتاج العديد من ن تطبیقات( ×٤۲‏ .) مثل التطبيقات المكتبية وتطبيقات الويب. 

2-توفيربيئة تشغيل لهذه التطبيقات. 

© ويتكون إطار lلعFrameworkJn‏ من: 

Language Runtime( CLR) -‏ 0117111017 ©بِينةَ التشغيل 

System 01355 Lib raries-‏ مکتبات تصنيفات النظام 

-ersاCompPi‏ مترجمات 

-ادوات اخرى 


التقسسويم : - 
أكمل:- م ها المخطط::1:معنا85 الذي يتم إنشاء الكائنات منه ويحدد به العديد من العناصر مثل الخصائص 
15 مره" والوظائف أو lلlwgئMethodsJ‏ . 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: العصة الذهني - الحواروالمناقشة -التفكي 
" يُعلن عن المتغيرات اللازمة لفتح قناة اتصال. الناقد 
* يكتب الكود الخاص باستدعاء ملف إكسيل إلى الذاكرة. | الوسائلالتعليمية 1 | 


" يخصص بيانات الأعمدة في جفدول البيانات بالذاكرة لما تناظرها | السبورة الإلكترونية - الكتاب المدرسي - عرض 
في أدوات التحكم في نافذة واجهة المستخدم تقديمي 


التعمهدجي د /مالمقصود بلغة ال ا50؟ 


عرضالدرس 


-:)Siructured Query Language) SQL ©‏ هي لغة التعامل مع ملفات قواعد البيانات. 
-> الشكل التالي يوضح مراحل استدعاء بيانات من قاعدة بيانات مخزنة على وسيط تخزين وتحويلها إلى جدول بيانات في 
الذاكرة. ثم عرضها في الكائن المناسب على شاشة النموذج في لغة الفيجوال بيزيك دون نت. 


أمثلة على جملة561601: 

لا استرجع جميع السجلات من جدول بيانات 1251©1 باستخدام جملة 1601 5. 
صيغة الجملة:- Select * from TableName‏ : : : 0 
الجملة:- Select * from Table1‏ غا ايب طآ سار واد زعم بی گر 


وادی مليان - مجرا ادة 
< وادى تمانراست 
الرباط ار البيضاء نهر الربيع - بوقراق 


لااعرض عمود "القارة" بدون تكرارمن جدول البيانات 1211 باستخدام جملةاء»6ا56 
صيغة الجملة:- Select Distinct FieldName from TableName‏ 
الجملة:- from Table1öرlallSelect Distinct‏ 


مصطلحات أخرى يمكن استخدامها أثناء التعامل مع قواعد البيانات منها: 

تعتبرإحدى جمل لغة ا 50وتستخدم هذه الجملة في استرجاع سجلات من جدول أومن عدة جداول في قاعدة 
البيانات. 

223501012 | مصدرالبیانات (ملف موجود داخل وسط التخزين أو جدول موجود بالذاكرة) 

عبارة عن همزة الوصل بين قاعدة البيانات والفيجوال بيزيك ولكل برنامج من برامج قواعد البيانات الخاص به 522 
provider‏ 

يعتبر تصنيف 1255© يمكن إنشاء متغيرمنه وليكن 05 والمتغيرءلفي ذاكرة الكمبيوتر يمثل جداول قاعدة البيانات 
ما هه( التي تم إحضارها من ملف البيانات إلى الذاكرة. 

يعتبرتصنيف Class‏ يمكن إنشاء متغيرمنه وليكن 01 والمتغير01في ذاكرة الكمبيوتريمثل جدول يحفظ به البيانات 
Data Table‏ التي تم إحضارها من ملف البيانات. 

da.۴ )d†(‏ | حيث ااأكاهي وسيلة لملا الصفوف (السجلات ) الموجودة في ©211 03131 بالذاكرة 


Select 


Provider 


DataSet 


DataTable 


التقوويم:- 


أختر:- الاتصال بين ۷8.۸ وقاعدة البيانات „(Data Adapter - Command - Connection)‏ 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: العصف الذهني - الحوار والمناقشة - التفكير 
يكتب الكود لفتح قناة اتصال. الناقد 


يعن عن المتغيرات الازمةلفتع قناةاتصال 5252-5-55 


يكتب الكود الخاص بتحميل ملف اءء×عE‏ إلى الذاكرة. السبورة الإلكترونية - الكتاب المدرسي - عرض 


تعديمي 


التدمهدجيد/مالمقصود بلغة ال ا50؟ 


عرضالدرس 


لا اوجد ناتج جمع العددين 8و 0 5باستخدام جملةاءءاهS؟.‏ 
صيغة الجملة: Select No1 + N02‏ 
الجملة : 10+ 8 Select‏ 


لااكتب جملة 5616014 اللازمة لعرض دول قارة "أنسيا" فقط من جدول1ءاطه1. 
صيغة |lلجCondition:ila Select FieldName from TableName Where‏ 
Select [FieldName] from TableName Where Condition gl‏ 


الجملة: from Table 1 Where ` ةلودلاS e1٥‏ أسيا = “القارة 
أو[ tıuılfrom Table1 Where [ ilgaJlSelect[‏ 


لا اكتب جملة 561661 اللازمة لاسترجاع عمود "من أهم المواني" في جدول 78161. 
صيغة الجملة: Select FieldName from TableName‏ 
الجملة:[ ]٤ءء‏ اءSمن‏ اهم المواني1ءاbھ from ٦‏ 


استخدم لغة ۲٤.۷8في‏ انشاع مشروع جديد. تحتوي نافذة النموذج فيه على أداة تحكم واحدة ( 1050 )ثم القیام 
بكتابة كود البرمجة اللازم ,لإستر جاع بيانات 22426256 ملف اكسيل باسم 21123510212.15 وليكن عمود "القارة" داخل ال 
ComboBox‏ على أن تكون نافذة النموذج كما بالشكل: 


2 ۳ 
اه احضار بيانات عمود من ملف إكسيل داخل ×080ط Em ٥)٥۸‏ 


لا يتم عمل الآتي:- 
إنشاء مشروع جديد. 
-> من مربع الأدوات( “<7100160) يتم وضع أداة التحكم 00175058071 داخل نافذة النموذج. 
-> الإنتقال إلى نافذة البرمجة (/1:001لالا ©6001 ) ثم كتابة الكود 


التقوويم:- 


أختر:- لفتح نافذة الكود نضغط علي زر من لوحة المفاتيح (علآباومط - ۴7 -مصج.). 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - /١‏ ياسمين شعيب 


الدرس الرابع 
إنشاع الدالة الخاصة بقراءة بيانات ورقة إكسيل 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: العصة الذهني - الحواروالمناقشة -التفكي 
يُعلن عن المتغيرات اللازمة لفتح قناة اتصال. الناقد 
يكتب الكود الخاص باستدعاء ملف إكسي ل إلى الذاكرة____الوسائلالتعليميقة ر 


يخصص بيانات الأعمدة في جدول البيانات ذاكرة لما تناظرها في | السبورة الإلكترونية - الكتاب المدرسي - عرض 
أدوات التحكم في نافذة واجهة المستخدم تقديمي 


التهمهي دود ,/ كم عدد المعاملات المخصصة لهذه الدالة ؟ 


عرضالدرس 


Function GetDatafromExcelsheet(FilePath As String, sql As String) As DataTable 
End Functign 
1 


هذه الدالة لها عدد 2وسائط هما:- 
© 1٥ا۴‏ حیٹ يمثل مسار ملف إكسيل 
©ان؟ حيث يمثل الجملة التي من خلالها سوف يستعلم عن البيانات من ملف إكسيل 
وتعود الدالة بقيمة من النوع ©2361 2437(اعبارة جدول بيانات في ذاكرة الكمبيوتر به البيانات التى احضرت من ملف إكسيل. 
«قم بالإعلان عن المتغيرات الآتية: 
Function GetDatafromExcelsheet (FilePath As String, sql As String) As DataTable‏ 
Dim MyConnection As New OleDb.OleDbConnection‏ 
Dim MyCommand As New OleDb.OleDbCommand‏ 
Dim da As New OleDb.OleDbDataAdapter‏ 


Dim dt As New DataTable 


End Function 


المتغير ٠١‏ ءء١١٠٥‏ را۷اسوف يمكن من فتح قناة اتصال بورقة العمل التي بها البيانات في ملف إكسيل. 
المتغير ٥٥٣٣2/٣٩۵‏ را۷اسوف يقوم بتنفيذ استعلام بموجبه يتم الحصول على البيانات من ملف إكسيل. 
المتغير 0 سوف يعمل كمحول للبيانات من ملف إكسيل لجدول البيانات لدى المتغيرا». 

المتغيراللدية جدول يحفظ به البيانات التي تم إحضارها من ملف إكسيل. 


يحتفظ عنصرالتحكم “10150 بقيمتين: إحداهما هي القيمة المعروضة التي يتم الاحتفاظ بها داخل خاصية 'ا12م 015 
Hember‏ والقيمة الأخرى غير معروضة؛ ؛يتم الاحتفاظ به داخل خاصية Value Member‏ . 


«عند التشغيل نجد أن قائمة القارات بها أسماء القارات كما هو موضح بالشكل الآني: 


التقوويم:- 
ضع علامة ١‏ أو ×:- يمكنك استخدام متغير من النوع (0171020 016566 ) لغرض فتح ملف قناة بيانات الاتصال ( ). 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا“ علي أن: 
يذكر المصطاح الأكثر أهمية في الدرس. 


كتب ااكودالخاص بتحميل ملف 000 ا 77 


يحل أسئلة الدرس بشكل صحيح. السبورة الإلكترونية - الكتاب المدرسي - عرض تقديمي 


العصف الذهني - الحوار والمناقشة 


التمهر د / حلتدريب ا الدرس ؟ 


عرضالدرس 


العبارة 
يتم فتح قناة اتصال بين البرنامج الذي يتم إنشاءة بلغة الفيجوال بيزيك دوت نت وملف اكسل 
باستخدام ادوات .AD0O.NE1‏ 
يستخدم المتغير من نوع 016150116©110في إغلاق قناة الإتصال التي تم فتحها. 
القيمة الراجعة من الدالة (كA‏ ا١ء (GetDatafromExcelSheet FilePath As String,‏ 
(DataTable As String )‏ من نوع String‏ 
يتم الإعلان عن الدالة١هناء"ں۴‏ باستخدام كلمةاں؟. 
يمكن استخدام متغير من نوع ٥٥0۸٣۸٣2٣٩۵‏ 0١ا0‏ بغرض فتح قناة اتصال بملف بيانات. 
يمكن إنشاء متغير من نوع 0331216 في الذاكرة يحفظ فيه البيانات التي يتم إحضارها من ملف 
البيانات. 


© قم بقراءة الكود التالي جيداً. ثم اجب على الآتي:- 


Function GetDatafromExcelSheet(FilePath As String, sql As String) As DataTable 
ım onnection As New OleDb.OleDbConnect ior 


عن البيانات من ملف إكسبل. ee acer‏ 

eee Garnet ak سوف تعود هذه الدالة بقيمة من النوع عبارة عن جدول بيانات‎ - ١" 
في ذاكرة الكمبيوتر به البيانات التي تم استيرادها من ملف إكسيل. سد‎ 
Birane لقد تم الإعلان عن المتغيرات الآتية:‎ -٤ 
-المتغير ..................... لفتح قناة اتصال بورقة العمل التي بها بيانات ملف إكسيل.‎ 

-المتغير ..................... الذي يقوم بتنفيذ استعلام بموجبه يتم الحصول على البيانات من ملف إكسيل. 

-المتغير .................... سوف يعمل كمحول للبيانات من ملف إكسيل. 

-المتغير. ..................... لديه جدول يحفظ به البيانات التي تم إحضارها من ملف إكسيل. 

- ثم يقوم محول البيانات 03باستخدام الأمر ..................... الذي لديه جملة الإستعلام او5عن البيانات المطلوبة من ملف 
إكسيل الذي استخدم قناة الاإتصال 1101© 011116©)لاالظلريقا” لتحويل البيانات إلى 01. 


التقوويم:- 
تقييم إجابات الطلاب. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا“ علي أن: ‏ 
" كتابة الكود المطلوب لاسترداد البيانات من ورقة اعع<«2. 


“ كتابة لكودالمطلوب لعرض الياات من خلال عنامرالتك, _ اوا اة 777 


المقابلة لها في نافذة واجهة المستخدم. السبورة الإلكترونية - الكتاب المدرسي - عرض 


" يكتشف الأخطاء المحتملة ويعرض رسالة الخطأ المناسبة. تقديمي 


العصف الذهني - الحوار والمناقشة 


التحهي د /متي يتم تنفيذ الحدث SelectedlndexChanged$؟‏ 


عرض الدرس 


© لكتابة كود المشروع الخاص ببرنامج الأطلىس العربي الإلكتروني. 

ەقم بالنقر المز دوج على على قائمة القارات في وضع |/ 5 يم د م معالج الحد ف Private Sub cmbbxContinent_SelectedIndexChanged( send‏ 

End Sub =: الا‎ 
ي‎ 

قم بكتابة الكود الآتي حتى تظهر قائمة باسماء الدول الخاصة بهذة القارة في 


SelectedIndexChanged(sender As Object, e As © 


Try *& * 117 ۰ 
Din عم عه‎ He o قائمة 61751216 كما هو موضح بالكود الأتي:‎ 
dt = GetDatafrı ا‎ hE etc :\A 3 s\detı :abase\a' xls" ¥ 
RTs «ائقارة » ا‎ "* _ 
4 ne. ph ntinent .SelectedValue & "' ") 


“3 ى‎ ٠ 
Datasoı dt الكود السا .لحد الا‎ 
rp pha jer = dt.Columns (0) .To‘ فى بی 5 لى:‎ 


String 


-تم استخدام جملة 77/6240 1لمنع ظهورأخطاء أثناء تشغيل البرنامج والتى e‏ 


.cnbbxState .SelectedIndex = @ 


تنتج عن استدعاع الحدث cmbbxContinent_SelectedlndexChanged‏ 


قبل ملع قائمة 3 القارات بأسماء القارات. 3 = Me.cmbbxstate.SelectedIndex‏ 
ل 
عند التشغيل نجد أن قائمة الدول كما هو موضح بالشكل الآني: 

قم بالنقر المزدوج على قائمة الدول في وضع التصميم حتى يظهر معالج الحدث الآتي:- 


Private Sub cmbbxstate . SelectedIndexChanged(sender As 0١ 


قم بكتابة الكود اللازم حتى تظهر بيانات الدولة التي تم اختيارها كما هو موضح بالشكل الآتي: ت دة 


a Sub cmbbxstate_SelectedIndexChanged(sender As Object, e As EventArgs) Han 


Try 
Dim dt As New 2331 
dt = GetDatafromExcı re et("c ا‎ eT e\atlas.xls", _ 
m [data$] + «اندوية‎ 0_0 
2 cette و" عق اا ج‎ 
Me. IbIOC.Text = dt.Rows(0) .Iter 2). 
Me. IblPorts.Text = dt.Rows(e)l. ten). - ser n ng 
Me.IbIWR. Text = dt.Rows(@) .Item(4) .ToStr: 


فى الكود السابق: 
يقصد ب 5/لا50ابالصفوف, Itemsg‏ بالأعمدة في جدول بيانات إكسيل» وأرقام كل من الصفوف أوالأعمدة تبدأ من )٠(‏ حيث سه۸ 
الصف الأول و17ع]! العمود الثالث 


١-عند‏ اختيارالقارة تظهر أسماء الدول التابعة لها. 

؟-باختيارالدولة تظهر بياناتها في أدوات التحكم الموجودة داخل نافذة النموذج. 

“لات -يتم تخصيص قيمة لكل عنصر من المتغيرة2 ( جدول البيانات) للحقل المناظر له (أداة التحكم) على نافذة واجهة 
المستخدم. 

-تم استخدام جملة «اع621 / رمع الكود لمنع حدوث الأخطاء المحتملة أثناء التشغيل 

التقويم :- 

حل اسئلة الكتاب المدرسي. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: 

2 يكتب الكود الخاص بعرض خرائط وأعلام الدول عن طريق 
أدوات لتحكم المناظرة لها في نافذة واجهة المستخدم. .| ن 70707 0o 7 mm‏ 

2 يمنع حدوث الأخطاء المحتملة أثناء التشغيل. 


" إظهارأنواع ملفات الصورفي المجلد السبورة الإلكترونية - الكتاب المدرسي - عرض تقديمي 


العصف الذهني - الحوار والمناقشة - التفكير الناقد 


التمهيد /ماهي الخاصية المسئولة عن إدراج صورة داخل الأداة ×0ط عدا 1م؟ 
عرض الدرس 


لاقم بضبط أسماء ملفات صور(أعلام وخرائط) الدول بنفس اسماء الدول الظاهرة في قائمة اسماء الدول 
> بعض أسماء ملفات أعلام الدول في مجلد 1305 : مص 000 - تونىس. 10م 
>بعض أسماء ملفات خرائط الدول في مجلد 1/1305 : "مصر. 09م - تونىس. و P^‏ 
لاحظ تشابة أسماء ملفات الصورفي المجلدين وذلك حتي يسهل استنتاج أسمائها عند تخصيص هذه 
الصورللاداتين picbxFlag‏ و picbxMap‏ كما تم كتابتها في جدول بيانات إكسيل. 
أكتب الكود الآتي في معالج الحدث cmbbxState_SelectedlndexChanged‏ 
لعرض علم الدولة وخريطتها كما هو موضح بالشكل الآتي: 
Private Sub cmbbxState_SelectedIndexChanged(sender As Object, e As EventArgs) Hand‏ 
reer c:\Atlas\database\atlas.xls",‏ و 
كر بن «اندولة "select * from [data$] where‏ 
Me.cmbbxState.SelectedValue & "'")‏ 
Me.lIbIDC.Text = dt.Rows(0).Item(2).ToString‏ 
Me.lblPorts.Text = dt.Rows(0).Item(3).ToString‏ 
Me. IbIWR.Text = dt.Rows (0) .Item(4).ToString‏ 
Dim picName As String = dt.Rows(0).Item(1).ToString 8 ".png"‏ 
Me.picbxFlag. Image = Image. FromFile("c:\Atlas\flags\" & picName)‏ 
Me .picbxMap. Image = Image.FromFile("c:\Atlas\maps\" 8 picName)‏ 
Catch ex As Exception‏ 


End Try 
End Sub 


عند التشغيل يظهر علم الدولة وخريطتها المختارة كما هو موضح بالشكل الآتي:- 


الأطئس العربي الإتكتروتي 


حريطة الدوله 


لاحظ- 
.١‏ التأكد من تسمية كل ملف باسم مناسب لمحتواه 
؟. توضيح أنواع الملفات المختلفة المستخدمة في المشروع (الخريطة - العلم - النشيد الوطني - 
مقطع فيديو للمعالم السياحية .......). 
۳. تحديد المسار المستخدم لحفظ الملفات. 
خ. استخدم عبارة 211 / ٠۲‏ ضمن التعليمات البرمجية لاكتشاف الأخطاء التي قد تحدث أثناء تنفيذ 
البرنامج ولعرض رسالة مناسبة لهذا الخطأ. 


التققويم :- لأكمل:- نستخدم العبارة ................................ لمنع أخطاء وقت التشغيل 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: 
يكتب الكود الخاص بعرض خرائط وأعلام الدول عن طريق 
اي ا سب 
يمنع حدوث الأخطاء المحتملة أثناء التشغيل. 


يحدد مسار حفظ ملفات الصور السبورة الإلكترونية - الكتاب المدرسي - عرض تقديمي 


العصف الذهني - الحوار والمناقشة - التفكير الناقد 


الاتمهيد / حل تدريبات الكتاب المدرسي؟ 


عرض الدرس 


ل اقرأ الكود التالي ثم اختر الإجابة الصحيحة:- 


“08م . ” & Dim picitame As String = dt .Rows(@).Item(1).ToString‏ 
Me. pîicFlag. Image = Imsge.FromFile("c:\Atlas\FflagsN" & picName)‏ 
Me. picMap. Image = Image.FromFile("c: \Atlas\maps\)" & picName)‏ 
->القيمة المخصصة للمتغیر ۸12۳ ءآ۲ هي 
- محتوى الصف ( )٠‏ والعمود )١(‏ في الجدول "أ" ؛ بالإضافة إلى امتداد الملف.0110. 
- محتوى الصف )١(‏ والعمود ( )٠‏ في الجدول "ل" ؛ بالإضافة إلى امتداد الملف.0110. 
- محتوى الصف ( *) والعمود )١(‏ في الجدول "ل" ؛ بالإضافة إلى امتداد الملف 51100 10. 


ل اقرأً الكود التالي ثم اختر الإجابة الصحيحة:- 


Me.picFlag.Image = 
Image.FromFile("c:\Atlas\flags\" & picName) 


>الأمرالمستخدم في ادراج ملف صورة إلى الأداة ( 0×3 r۵8‏ ںicu٥):‏ 
Statement‏ (7) (*) 
Image forthe control PicFlag‏ 


FromFile forthe control PicFlag 


Image forthe control FromFile 


التقويم :- تقييم إجابات الطلاب. 
إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص -أ/ ياسمبن شعيب 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: 
2 يكتب الكود الخاص بتشغيا أوإيقاف ملف صوت عند 


الضغط على زر أمر. 
*_يحدد مكان الإعلان عن المتغيرات على مستوى التصنيف أو ١‏ الوشائل التعليمية 2 


الإجراع. ل 1 5 
عا السبورة الإلكترونية - الكتاب المدرسى - عرض تقد 
إظهارأنواع ملفات الصوت في المجلد لسبورة الإلكترو رسي - عرض تقديمي 


التدمهي د /كيفيمكن إدراج ملف صوت داخل الأداة W.N.۴؟‏ 


عرض الدرس 


لاقم بضبط أسماء ملفات الصوت الخاصة بالسلام الوطني للدول بنفس الأسماء الظاهرة في قائمة أسماء 


الدول. 
لابعض أسماء ملفات الصوت الخاصة بالسلام الوطني في مجلد ۸۸۸٤۸٩‏ :3م .تونس - 11103. مصر 


لاأكتب الكود الآتي في معالج الحدث د 


Private Sub cmbbxState_SelectedIndexChanged(sender As Object, e As EventArgs) Hand 


™™ e dt Ax nı Dutta لتشغيل‎ 5 


dt = GetDatafromExcelSheet("c:\Atlas\database\atlas.xls", _‏ 
ملف 1 ددد اه ١‏ ني لا ١‏ له كما با *" -اندونة EEE TE EE E‏ 
صوت م 9 هو موضح د )"'" & Me.cmbbxState.SelectedValue‏ 
Me.IbIDC.Text = dt.Rows(0) .Item(2).ToString‏ 


Me.IblPorts.Text = dt.Rows(0) .Item(3).ToString لاد ي‎ 
Me. IbINR.Text = dt.Rows(0) . وصلعغكم1. (4)هعغ1‎ 


العصف الذهني - الحواروالمناقشة - التفكير الناقد 


01 لاحظ أنه تم الإعلان عن متغيرنتحت اسم Dim picName As String = dt.Rows(0).Item(1).ToString 8 ".png"‏ 


Me .picbxFlag. Image = Image.FromFile("c:\Atlas\flags\" & picName) 


Me .picbxMap. Image = Image. FromFile("c:\Atlas\maps\" 8 picName) 2 ى لد ف. وذلك لد زين‎ ١ anthemM p3 
ی ی‎ TT & dt.Rows(0).Item(1).ToString & ".mp3" اره 1 0 الصوت د ۲ ل ۵ ایند 3 د 3 امه في ا ) من‎ 09 


"إيقاف تشغيل السلام الوطني" = م1 Me. aT‏ 
معالج حدث مسي 


End Try 


للتحكم في تشغيل أو إيقاف ملف صوت السلام الوطني تحلص 
قم بكتابة آلكود في معألج الحدث “11 ©_لادام_مره5]05الخاص بالزرلا2!2_م 011510 كما هو موضح بالكود 


الآتي: 


Private Sub btnStop_play_Click(sender As Object, e As EventArgs) Handles btnStop_play.Click 
If Me. btnStop_play.1exئ‎ = إيقاف تشغيل السلام الوطني"‎ " 0 
Me. MPlayer .close() 
Ne, btnStop_p1ay.1exئ‎ = "نشغيل السلام الوطني"‎ 
Else 
Me. MPlayer. URL = anthemp3 
Ne. btnStop_p1aJ.1e*غ‎ = "إيقاف نشغيل السلام الوطني"‎ 
End If 
End Sub 


E 

|- ينبغي التأكد من تسمية ملفات الصوت الخاصة بالسلام الوطني لكل دولة. 

۲- - إظهار أنواع ملفات السلام الوطني. 

سوف تظهر نافذة واجهة المستخدم بعد التشغيل كما بالشكل التالى: 2 


العاصمة الفاهرة 
أهم المواني الأسكندرية 


ê ۶ 5055‏ من مصادر المياه نهر النبل 
التلقفويم:- اختر:- 


eee (Stop Sub - End If - Final If) بالأمر‎ |F تنتهي جملة‎ - 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


إضافة صوت السلام الوطني "التدريبات" 


نهاية الدرس يجب أن يكون الطالب قادرا علي أن: 

" يكتب الكود الخاص بتشغيل أو إيقاف ملف صوت عند 
الضغط على زرامر. 

*_يحدد مكان الإعلان عن المتغيرات على مستوى التصنيف أو | الوسائلالتعليمية ااا 
الإجراع. 5 1 
a‏ السبورة الإلكترونية - الكتاب المدرسى - عرض تقدي 

*_إظهار أنواع ملفات الصوت في المجلد رة الإلكترو يلك E ES‏ 


الاتمهيد / حل تدريبات الكتاب المدرسي؟ 


عرض الدرس 


العصف الذهني - الحوار والمناقشة - التفكير الناقد 


لاقم بإعداد مشروع باسم باسدم (VB_Multimedia_Sound 2K)‏ لإدراج ملف صوت داخل أداة التحكم 
)AxW ind ows MediaPlayer)‏ مستخدما الأداة ( .601705860 )على أن يكون شكل النموذج كالآتى: 


a WindowsMediaPlayer ControlTool SES 1‏ تسم 
Choose a Sound File‏ 
1 


كود البرمجة المستخدم كالتالي: 
Insert a Sound File to a WindowsMediaPlayer‏ 
ControlT ool‏ 
Public Class Form'1‏ 
Private Sub ComboBox1_SelectedlndexChanged(ByVal‏ 
sender As System.Object, ByVal e As System.EventArgs)‏ 
Handles ComboBox1.SelectedlndexChanged‏ 
Dim VAs String‏ 
V= ComboBox1.Selectedltem‏ 
AxWindowsMediaPlayer1.URL =V‏ 
End Sub‏ 
End Class‏ 


التقويم :- تقييم إجابات الطلاب. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوترالمتخصص -أ/ ياسمين شعيب 


الدرس الحادي عشر 
إضافة فيديو المعالم السياحية 


. يكتب الكود الخاص بتشقيل أو إبقاف ملف ن 


امسا جين دتا ال 


التدهي دود / كيفية إخفاء أو إظهار أداة $Windows Media Player‏ 


عرضالدرس 


لاقم بضبط أسماء ملفات الفيديو الخاصة بالمعالم السياحية للدول بنفس أسماء الدول الظاهرة في 
قائمة اسماء الدول 
لا بعض أسماء ملفات الفيديو الخاصة بالمعالم السياحية في مجلد10605// :- مصر. ۷٣۷‏ - 111 االا.توندس 


mw 


لاإضافة زرأمر إلى واجهة البرنامج بحيث تكون قيمة الخاصية الاسم "ayvide05اnPاt"‏ وقيمة نص 
الخاصية هي tourist attractions”‏ . 

لااكتب الكود التالي في معالج الأحداث ©1٠16"‏ _05»عكالالاحاطم]6" للزر"5م»ع ل ]لالاجا6]0" لتشغيل ملف 
فيديو المعالم السياحية للدول كما هو موضح في الكود التالي: 


Private Sub btnPlayVideos_Click(sender As Object, e As EventArgs) Handles btnPlayVideos.Click 
If Me.btnPlayVideos.Text = ”"معالم سياحية"‎ 0 
Me.wMPlayer.Visible = True 
Me.NMPlayer.URL = "c:\Atlas\videos\" & Me.cmbbxState. SelectedValue.ToString & ".wmv" 
Me.btnPlayVideos.T1ext = "إيقاف العرض"‎ 
Else 
Me.wmPlayer.Visible = False 
Me.WMPlayer.close() 
Me.btnPlayVideos. Text = "معالم سياحية"‎ 0 
End If تذکر:-‎ 


End sub التأكد من تسمية ملفات الفيديو الخاصة بالمعالم السياحية لكل دولة.‎ .١ 

؟. عرض ملفات الفيديو الخاصة بالمعالم السياحية. 
3 التعرف على المسار الذي يتم فيه حفظ ملفات الفيديو. 

لاحظ:- 

|. تم استخدام الخاصية u٠‏ اة ۵۷٠ء٠‏ اءS‏ لعنصر التحكم "1711751216" للحصول على اسم البلد؛ لتحديد 
اسم ملف الفيديو ومساره. 
۲ .تم عرض عنصر التحكم :0/15131/6/الااعن طريق ضبط الخاصية مرني على القيمة 1116 ؛ حتى تتمكن من رؤية 
ملف الفيديو المعروض على الشاشة 
۳. يمكنك إيقاف أو تشغيل ملف الفيدية من خلال زر10605/٠/اج021]ط‏ كما م موضح في ك السابق. 
ستظهرنافذة واجهة المستخدم بعد التنفيذ كما يلي: 


التقويم :- 
اكمل:- تم استخدام الخاصية 
"cnx State"‏ للحصول على اسم البلد. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمبن شعيب 


الدرس الثاني عشر 
إضافة فيديو المعالم السياحية "التدريبات" 


نهاية الدرس يجب أن يكون الطالب قادرا“ علي أن: العصف الذهني - الحواروالمناقشة - التفكير الناقد 
" يستطيع مراجعة كود المشروع. 


اساسا ت د ا ال وسائ ايمر 


إظهارانواع ملفات الفيديو في المجلد السبورة الإلكترونية - الكتاب المدرسي - عرض تقديمي 


التمهيد / حل تدريبات الكتاب المدرسي؟ 


عض الدرس 


ل اختر علامة( ”) أوعلامة( ×) أمام كل عبارة مما يلي: 


الى رة 


.'١‏ يمكن استخدا م جملة ۲/٥۵٤٥۸‏ لاكتشاف الأخطاء أثناء تشغيل البرنامج 
واظهاررسالة مناسبة لهذا الخطا. 


آ. 9C." ext = dt. Rows(0).Item(2).ToString‏ ااا.Meيخصص‏ الكود قيمة العنصر 
الموجود فى الصف الثانى والعمود الأول لجدول البيانات فى .!١0©‏ 


۳ عند »ه86 201060 للأداة 0و2 لم16 ها 5يتم تنفيذ الحدث تغيير العنصر 
النشط بالقائمة الموجودة داخل هذه الأداة. 


ء. يستخدم الرمز & بين المتغيرات الحرفية والنصوص لدمجها وجعلها سلسلة 
حرفية واحدة. 


dt .NRows( 0). Item(2). ToString .۵‏ -<]) 0.1١اطا.ع1/اايخصص‏ الكود قيمة العنصر 
الموجود فى الصف الأول والعمود الثالث فى جدول البيانات ويضعها داخل 6©اطا. 


.WMP layer. UR| = “anthem.mpڑ3” .١‏ في الكود -#1لاالخاصية تستخدم في 
إيقاف أو تشغيل ملف الصوت 3م “a۸۸٥۸.‏ .”' 


/. تستخدم الدالة ۴٣٥٣٣۴1۴‏ فى تخصيص صورة من ملف . 


۸. يمكن استخدام الخاصية îllDisplayMemberدö‏ 210801 لتحديد حقل من 
مصدرالبيانات يظهر محتواه فى هذه الأداة. 


.٩‏ يمكن استخدام الخاصية Value Nen be۲‏ لاد 601705860 لتحديد حقل من 
مصدرالبيانات كقيمة لكل عنصر من عناصر القائمة. 


التقويم :- تقييم إجابات الطلاب. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


الدرس الثالث عشر 
مراجعة 


الناقد 

8 يحدد أهم مصطلحات الدرس. 

*.. تخل تغارين اكاب القدرسي. الا 
" يكتب كود المشروع بالطريقة الصحيحة. السبورة الإلكترونية - الكتاب المدرسي - عرض 


لعديمي 


التدهي د /ماهي أهم أساسيات مشروع الأطلس؟ 


(مرتين - Dim -DataTable - dt‏ -ع - (Private Sub - Try/Catch - Me‏ 
.١‏ لفتح نافذة الكود على معالج الحدث الافتراض للاداة ننقر على الاداة فى شاشة 
التصميم. 
؟. يبدأ الإجراء فى نافذة الكود بعبارة 
۳. الأمر(026212616 dt As New‏ 0أ0) المتغير هو ]1 ونوع المتغير 
المستخدمة فى الكود تدل على النموذج الحالى 
فى منع وقوع الأخطاء التى قد تحدث أثناء تشغيل البرنامج 

الربط يستخدم لربط السلاسل الحرفية لتكوين سلسلة حرفية واحدة 

.يتم الاعلان عن المتغيرات بالامر 


۶ 
أكمل:-‎ 
٠ 


التقويم :- تقييم إجابات الطلاب. 


إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


الدرس الرابع عشر 
مراجعة 


بنهاية الدرس يجب أن يكون الطالب قادرا“ علي أن: العصف الذهني - الحواروالمناقشة - التفكير الناقد 


يحدد أهم مصطلحات الدرس. 
يحل تمارين الكتاب المدرسي. لاا ال 


يكتب كود المشروع بالطريقة الصحيحة. ١‏ السبورة الإلكترونية - الكتاب المدرسي - عرض تقديمي 


التدهفي دم /ماهي أهم أساسيات مشروع الأطلس؟ 
ك2 من الكود التالى اوجد: 


Function GetDataFromExcelSheet(ByV al FilePath As String, ByVal sql As 
String) As DataTable 
Dim MyConnection As New OleDb.OleDbConnection 
Dim MyCommand As New OleDb.OleDbCommand 
Dim da As New OleDb.OleDbDataAdapter 
Dim dt As New DataTable 


End Function 


. أسماء الوسائط 
. نوع الوسائط 
. نوع القيمة الراجعة 
...ل مدل مسار مكان ملف الاكسيل 
. ......................يمثل جملة التعامل مع البيانات فى ملف الاكسيل 
. تم الاعلان عن المتغيرات باستخدام الأمر 
. لقد تم الإعلان عن المتغيرات الآتية: 
لفتح قناة اتصال بورقة العمل التي بها بيانات ملف إكسيل. 
الذي يقوم بتنفيذ استعلام بموجبه يتم الحصول على البيانات من ملف إكسيل. 
سوف يعمل كمحول للبيانات من ملف إكسيل. 
لديه جدول يحفظ به البيانات التي تم إحضارها من ملف اكسيل. 


التقويم :- تقييم إجابات الطلاب. 
إعداد وتصميم/جروب فريق أصدقاء الكمبيوتر المتخصص - أ/ ياسمين شعيب 


